inherited frmRel_OrdemCompra: TfrmRel_OrdemCompra
  Left = 4
  Top = 125
  Caption = 'Ordem de Compra'
  ClientHeight = 310
  ClientWidth = 786
  Font.Style = [fsBold]
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 53
    Width = 786
    Height = 190
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 784
      Height = 188
      Align = alClient
      DataSource = dtsrc
      FixedColor = 14081504
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Arial'
      TitleFont.Style = [fsBold]
      Columns = <
        item
          Expanded = False
          FieldName = 'Numero'
          Title.Caption = 'Nota'
          Width = 78
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'Serie'
          Title.Alignment = taCenter
          Title.Caption = 'S'#233'rie'
          Width = 34
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Entidade'
          Width = 281
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Qtde'
          Width = 68
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Vlr'
          Title.Caption = 'Valor'
          Width = 107
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'Data'
          Title.Alignment = taCenter
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Estoque'
          Visible = True
        end>
    end
  end
  inherited Panel2: TPanel
    Top = 243
    Width = 786
    inherited bimprimir: TFlatButton
      Enabled = True
      OnClick = bimprimirClick
    end
    inherited btncancelar: TFlatButton
      Left = 337
      OnClick = btncancelarClick
    end
    inherited btnfechar: TFlatButton
      Left = 657
    end
  end
  inherited sb: TStatusBar
    Top = 291
    Width = 786
  end
  inherited Panel3: TPanel
    Width = 786
    Height = 53
    inherited Label4: TLabel
      Left = 517
    end
    object Label12: TLabel [1]
      Left = 27
      Top = 18
      Width = 45
      Height = 13
      Caption = 'Produto'
    end
    object cProd: TSpeedButton [2]
      Left = 187
      Top = 15
      Width = 22
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = cProdClick
    end
    inherited ListaEmp: TCheckListBox
      Left = 516
      TabOrder = 3
      Visible = False
    end
    inherited ckListaEmpresas: TCheckBox
      Left = 521
      Visible = False
    end
    object edProduto: TMaskEdit
      Left = 80
      Top = 16
      Width = 105
      Height = 21
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecUpperCase
      MaxLength = 15
      TabOrder = 1
      OnEnter = edProdutoEnter
      OnExit = edProdutoExit
      OnKeyDown = edProdutoKeyDown
    end
    object pProd: TPanel
      Left = 211
      Top = 15
      Width = 293
      Height = 22
      Alignment = taLeftJustify
      BevelInner = bvLowered
      TabOrder = 2
    end
  end
  inherited RDP: TRDprint
    OnNewPage = RDPNewPage
    OnBeforeNewPage = RDPBeforeNewPage
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 8
    Top = 101
    object CDSNumero: TStringField
      FieldName = 'Numero'
      Size = 9
    end
    object CDSSerie: TStringField
      FieldName = 'Serie'
      Size = 3
    end
    object CDSEntidade: TStringField
      FieldName = 'Entidade'
      Size = 46
    end
    object CDSQtde: TFloatField
      FieldName = 'Qtde'
    end
    object CDSVlr: TFloatField
      FieldName = 'Vlr'
      currency = True
    end
    object CDSData: TDateTimeField
      FieldName = 'Data'
    end
    object CDSEstoque: TFloatField
      FieldName = 'Estoque'
    end
  end
  object dtsrc: TDataSource
    DataSet = CDS
    Left = 40
    Top = 101
  end
end
